home *** CD-ROM | disk | FTP | other *** search
/ BBS Toolkit / BBS Toolkit.iso / doors_2 / rnet107u.zip / LOWMEM.BAT < prev    next >
DOS Batch File  |  1991-01-03  |  4KB  |  93 lines
  1. echo off
  2. cls
  3. echo %0 Processing... %1   [low memory/external compression example batch]
  4. rem ┌─────────────────────────────────────────────────────────────────────────┐
  5. rem │ This example batch file is for operating RNET with ARCHIVE=EXTERNAL for │
  6. rem │ Sysops running in tight memory where the shell for the compression util │
  7. rem │ is failing due to memory.  Note that RNET simply does NOT do ANY shells │
  8. rem │ when ARCHIVE=EXTERNAL is specified in the HOST_ID.CFG file!             │
  9. rem └─────────────────────────────────────────────────────────────────────────┘
  10.  
  11. if '%1'=='' goto BADID
  12. goto MAIL
  13.  
  14. :BADID
  15. echo ┌────────────────────────────────────────────────────────────────────────┐
  16. echo │ Warning!  This batch file requires the host packet ID as a parameter!  │
  17. echo └────────────────────────────────────────────────────────────────────────┘
  18. echo Examples:
  19. echo           %0 FTL        (for Faster-Than-Light as host)
  20. echo           %0 TRP        (for The Right Place as host)
  21. echo           %0 CHEERS     (for Cheers! SuperRegional as host)
  22. echo           %0 EXECNET    (for Executive Network as host)
  23. echo %0 started without host ID parameter! >> ERROR.LOG
  24. goto ABORTMAIL
  25.  
  26. :MAIL
  27.  
  28. e:
  29. cd \rnet
  30.  
  31. rem ┌─────────────────────────────────────────────────────────────────────────┐
  32. rem │ Export mail which is for your host.  Finds mail in conferences which    │
  33. rem │ needs to be sent up to host system.  If the *.REP packet is present,    │
  34. rem │ we must uncompress it to allow RNET to append output.  Uses PKUNZIP.    │
  35. rem │ The contents of the REP packet must be placed in the WORKING DIR as set │
  36. rem │ in the HOST_ID.CFG file.  In this case, we are using e:\rnet\workdir\   │
  37. rem ├─────────────────────────────────────────────────────────────────────────┤
  38. rem │ After RNET has processed the new mail, we must rebuild the .REP file.   │
  39. rem │ For this example, we will use PKZIP -M -EX for this operation.  We will │
  40. rem │ also include the REP.LOG in case we need to see the contents later.     │
  41. rem └─────────────────────────────────────────────────────────────────────────┘
  42.  
  43. if exist %1.REP PKUNZIP -O %1.REP e:\rnet\workdir\
  44.  
  45. RNET EXPORT %1
  46.  
  47. if not exist e:\rnet\workdir\%1.MSG goto SKIPREP
  48.  
  49. PKZIP -M -EX %1.REP e:\rnet\workdir\%1.MSG e:\rnet\workdir\REP.LOG
  50.  
  51. :SKIPREP
  52.  
  53. rem ┌─────────────────────────────────────────────────────────────────────────┐
  54. rem │ Send *.REP packet up to host and download *.QWK packet for importing.   │
  55. rem │ Replace this with your terminal program and script designed for this.   │
  56. rem │ Whatever your terminal program and script, if the REP packet is         │
  57. rem │ successfully uploaded, you MUST delete the REP packet or RNET will      │
  58. rem │ append tomorrows mail to the end!  You may simply rename or move the    │
  59. rem │ REP packet also.                                                        │
  60. rem └─────────────────────────────────────────────────────────────────────────┘
  61.  
  62. echo Removing previous %1.QWK packet (one should not exist yet!)
  63. if exist %1.QWK erase %1.QWK
  64.  
  65. rem ┌─────────────────────────────────────┐
  66. rem │ assumes script called (host_id).slc │
  67. rem └─────────────────────────────────────┘
  68.  
  69. echo Calling host...  using Telix script %1.slc, located in e:\telix\
  70. cd \telix
  71. telix -s%1
  72. cd \rnet
  73.  
  74. rem ┌─────────────────────────────────────────────────────────────────────────┐
  75. rem │ Now IMPORT any new mail aquired from the host (*.QWK)  The QWK packet   │
  76. rem │ must be uncompressed for RNET to process it.  Only files needed from    │
  77. rem │ the QWK packet are MESSAGES.DAT and CONTROL.DAT.                        │
  78. rem └─────────────────────────────────────────────────────────────────────────┘
  79.  
  80. if not exist %1.QWK goto ENDOFMAIL
  81.  
  82. PKUNZIP %1.QWK messages.dat control.dat e:\rnet\workdir\
  83.  
  84. RNET IMPORT %1
  85.  
  86. :ENDOFMAIL
  87.  
  88. c:
  89. cd\pcb
  90. echo %0 Processing of %1 Completed...  returned to c:\pcb\
  91. :ABORTMAIL
  92.  
  93.